home *** CD-ROM | disk | FTP | other *** search
/ J-Mac Electronics & Home Comics / J-Mac Electronics & Home Comics.iso / mac / J-MAC / G08F / G08_FUMI.Dxr / 00049.ls < prev    next >
Encoding:
Text File  |  1998-01-22  |  2.3 KB  |  121 lines
  1. global i
  2.  
  3. on startMovie
  4.   set mycursor to [1, 2]
  5.   set the cursor of sprite 11 to mycursor
  6.   set the cursor of sprite 12 to mycursor
  7.   repeat with i = 14 to 18
  8.     set the cursor of sprite i to mycursor
  9.   end repeat
  10.   set volset to the soundLevel
  11.   if the soundEnabled = 0 then
  12.     set the soundEnabled to 1
  13.   end if
  14. end
  15.  
  16. on doexit
  17.   sound stop 1
  18.   go("M3", "@::JMACMENU")
  19. end
  20.  
  21. on crtopen
  22.   puppetSprite(6, 1)
  23.   repeat while the stillDown
  24.     set the memberNum of sprite 6 to 11
  25.     updateStage()
  26.   end repeat
  27.   set the memberNum of sprite 6 to 10
  28.   updateStage()
  29.   puppetSprite(6, 0)
  30. end
  31.  
  32. on crtclose
  33.   puppetSprite(7, 1)
  34.   repeat while the stillDown
  35.     set the memberNum of sprite 7 to 13
  36.     updateStage()
  37.   end repeat
  38.   set the memberNum of sprite 7 to 12
  39.   updateStage()
  40.   puppetSprite(7, 0)
  41. end
  42.  
  43. on crtback
  44.   puppetSprite(22, 1)
  45.   repeat while the stillDown
  46.     set the memberNum of sprite 22 to 26
  47.     updateStage()
  48.   end repeat
  49.   set the memberNum of sprite 22 to 25
  50.   updateStage()
  51.   puppetSprite(22, 0)
  52.   puppetSprite(1, 0)
  53. end
  54.  
  55. on crtzoomin
  56.   puppetSprite(21, 1)
  57.   repeat while the stillDown
  58.     set the memberNum of sprite 21 to 28
  59.     updateStage()
  60.   end repeat
  61.   set the memberNum of sprite 21 to 27
  62.   updateStage()
  63.   puppetSprite(21, 0)
  64. end
  65.  
  66. on crtzoomout
  67.   puppetSprite(21, 1)
  68.   repeat while the stillDown
  69.     set the memberNum of sprite 21 to 30
  70.     updateStage()
  71.   end repeat
  72.   set the memberNum of sprite 21 to 29
  73.   updateStage()
  74.   puppetSprite(21, 0)
  75.   puppetSprite(1, 0)
  76. end
  77.  
  78. on crtreiyer
  79.   puppetSprite(20, 1)
  80.   repeat while the stillDown
  81.     set the memberNum of sprite 20 to 32
  82.     updateStage()
  83.   end repeat
  84.   set the memberNum of sprite 20 to 31
  85.   updateStage()
  86.   puppetSprite(20, 0)
  87. end
  88.  
  89. on crtg1
  90.   puppetSprite(3, 1)
  91.   repeat while the stillDown
  92.     set the memberNum of sprite 3 to 17
  93.     updateStage()
  94.   end repeat
  95.   set the memberNum of sprite 3 to 16
  96.   updateStage()
  97.   puppetSprite(3, 0)
  98. end
  99.  
  100. on crtg2
  101.   puppetSprite(2, 1)
  102.   repeat while the stillDown
  103.     set the memberNum of sprite 2 to 15
  104.     updateStage()
  105.   end repeat
  106.   set the memberNum of sprite 2 to 14
  107.   updateStage()
  108.   puppetSprite(2, 0)
  109. end
  110.  
  111. on crtclose2
  112.   puppetSprite(22, 1)
  113.   repeat while the stillDown
  114.     set the memberNum of sprite 22 to 19
  115.     updateStage()
  116.   end repeat
  117.   set the memberNum of sprite 22 to 18
  118.   updateStage()
  119.   puppetSprite(22, 0)
  120. end
  121.